home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…tion Library 2 (Reseller) / Apple R&P Lib Reseller v2.0.iso / 3-Demos / Third Party Demos / Networking / MacMainFrame / card_12102.txt < prev    next >
Text File  |  1989-07-14  |  11KB  |  472 lines

  1. -- card: 12102 from stack: in
  2. -- bmap block id: 24978
  3. -- flags: 0000
  4. -- background id: 2776
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on mouseUp
  8.   global temp
  9. end mouseUp
  10.  
  11.  
  12.  
  13. -- part 1 (button)
  14. -- low flags: 00
  15. -- high flags: 0002
  16. -- rect: left=7 top=308 right=336 bottom=45
  17. -- title width / last selected line: 0
  18. -- icon id / first selected line: 30557 / 30557
  19. -- text alignment: 1
  20. -- font id: 0
  21. -- text size: 12
  22. -- style flags: 0
  23. -- line height: 16
  24. -- part name: First
  25. ----- HyperTalk script -----
  26. on mouseUp
  27.   visual effect scroll right
  28.   push card
  29.   go to card id 9514
  30. end mouseUp
  31.  
  32.  
  33.  
  34. -- part 2 (button)
  35. -- low flags: 00
  36. -- high flags: 0002
  37. -- rect: left=469 top=309 right=337 bottom=506
  38. -- title width / last selected line: 0
  39. -- icon id / first selected line: 1012 / 1012
  40. -- text alignment: 1
  41. -- font id: 0
  42. -- text size: 12
  43. -- style flags: 0
  44. -- line height: 16
  45. -- part name: Return
  46. ----- HyperTalk script -----
  47. on mouseUp
  48.   visual effect scroll left
  49.   hide card field id 4
  50.   hide card field id 5
  51.   hide card field id 6
  52.   set hilite of card button id 8 to false
  53.   set hilite of card button id 9 to false
  54.   set hilite of card button id 10 to false
  55.   pop card
  56. end mouseUp
  57.  
  58.  
  59.  
  60. -- part 3 (field)
  61. -- low flags: 81
  62. -- high flags: 2004
  63. -- rect: left=188 top=80 right=219 bottom=390
  64. -- title width / last selected line: 0
  65. -- icon id / first selected line: 0 / 0
  66. -- text alignment: 0
  67. -- font id: 3
  68. -- text size: 10
  69. -- style flags: 0
  70. -- line height: 13
  71. -- part name: 
  72. ----- HyperTalk script -----
  73. on mouseUp
  74.   hide card field id 3
  75. end mouseUp
  76. on mouseLeave
  77.   hide card field id 3
  78. end mouseLeave
  79.  
  80.  
  81.  
  82.  
  83. -- part 4 (field)
  84. -- low flags: 81
  85. -- high flags: 2004
  86. -- rect: left=15 top=78 right=284 bottom=392
  87. -- title width / last selected line: 0
  88. -- icon id / first selected line: 0 / 0
  89. -- text alignment: 0
  90. -- font id: 3
  91. -- text size: 12
  92. -- style flags: 0
  93. -- line height: 16
  94. -- part name: 
  95. ----- HyperTalk script -----
  96. on mouseUp
  97.   hide card field id 4
  98.   hide card field id 3
  99.   hide card field id 17
  100.   set hilite of card button id 8 to false
  101. end mouseUp
  102.  
  103.  
  104.  
  105. -- part 5 (field)
  106. -- low flags: 81
  107. -- high flags: 2004
  108. -- rect: left=59 top=72 right=275 bottom=393
  109. -- title width / last selected line: 0
  110. -- icon id / first selected line: 0 / 0
  111. -- text alignment: 0
  112. -- font id: 3
  113. -- text size: 12
  114. -- style flags: 0
  115. -- line height: 16
  116. -- part name: 
  117. ----- HyperTalk script -----
  118. on mouseUp
  119.   hide card field id 5
  120.   set hilite of card button id 9 to false
  121. end mouseUp
  122.  
  123.  
  124.  
  125.  
  126. -- part 6 (field)
  127. -- low flags: 81
  128. -- high flags: 2004
  129. -- rect: left=84 top=78 right=250 bottom=393
  130. -- title width / last selected line: 0
  131. -- icon id / first selected line: 0 / 0
  132. -- text alignment: 0
  133. -- font id: 3
  134. -- text size: 12
  135. -- style flags: 0
  136. -- line height: 16
  137. -- part name: 
  138. ----- HyperTalk script -----
  139. on mouseUp
  140.   hide card field id 6
  141.   hide card field id 3
  142.   set hilite of card button id 10 to false
  143. end mouseUp
  144.  
  145.  
  146.  
  147. -- part 7 (button)
  148. -- low flags: 00
  149. -- high flags: 0000
  150. -- rect: left=451 top=30 right=54 bottom=479
  151. -- title width / last selected line: 0
  152. -- icon id / first selected line: 26635 / 26635
  153. -- text alignment: 1
  154. -- font id: 0
  155. -- text size: 12
  156. -- style flags: 0
  157. -- line height: 16
  158. -- part name: New Button
  159. ----- HyperTalk script -----
  160. on mouseUp
  161.   hide card field id 4
  162.   hide card field id 5
  163.   hide card field id 6
  164.   set hilite of card button id 8 to false
  165.   set hilite of card button id 9 to false
  166.   set hilite of card button id 10 to false
  167.   show card field id 3
  168. end mouseUp
  169.  
  170.  
  171.  
  172. -- part 8 (button)
  173. -- low flags: 00
  174. -- high flags: 2006
  175. -- rect: left=68 top=54 right=74 bottom=87
  176. -- title width / last selected line: 0
  177. -- icon id / first selected line: 0 / 0
  178. -- text alignment: 1
  179. -- font id: 0
  180. -- text size: 12
  181. -- style flags: 0
  182. -- line height: 16
  183. -- part name: New Button
  184. ----- HyperTalk script -----
  185. on mouseUp
  186.   set hilite of card button id 9 to false
  187.   set hilite of card button id 10 to false
  188.   hide card field id 3
  189.   hide card field id 5
  190.   hide card field id 6
  191.   hide card field id 17
  192.   show card field id 4
  193.   if hilite of card button id 8 is true then
  194.     show card field id 4
  195.   else
  196.     hide card field id 4
  197.   end if
  198. end mouseUp
  199.  
  200.  
  201.  
  202.  
  203.  
  204.  
  205.  
  206. -- part 9 (button)
  207. -- low flags: 00
  208. -- high flags: 2006
  209. -- rect: left=126 top=54 right=74 bottom=145
  210. -- title width / last selected line: 0
  211. -- icon id / first selected line: 0 / 0
  212. -- text alignment: 1
  213. -- font id: 0
  214. -- text size: 12
  215. -- style flags: 0
  216. -- line height: 16
  217. -- part name: New Button
  218. ----- HyperTalk script -----
  219. on mouseUp
  220.   set hilite of card button id 8 to false
  221.   set hilite of card button id 10 to false
  222.   hide card field id 3
  223.   hide card field id 4
  224.   hide card field id 6
  225.   hide card field id 17
  226.   show card field id 5
  227.   if hilite of card button id 9 is false then
  228.     hide card field id 5
  229.   end if
  230. end mouseUp
  231.  
  232.  
  233.  
  234.  
  235. -- part 10 (button)
  236. -- low flags: 00
  237. -- high flags: 2006
  238. -- rect: left=196 top=54 right=74 bottom=215
  239. -- title width / last selected line: 0
  240. -- icon id / first selected line: 0 / 0
  241. -- text alignment: 1
  242. -- font id: 0
  243. -- text size: 12
  244. -- style flags: 0
  245. -- line height: 16
  246. -- part name: New Button
  247. ----- HyperTalk script -----
  248. on mouseUp
  249.   set hilite of card button id 8 to false
  250.   set hilite of card button id 9 to false
  251.   hide card field id 3
  252.   hide card field id 4
  253.   hide card field id 5
  254.   hide card field id 17
  255.   show card field id 6
  256.   if hilite of card button id 10 is false then
  257.     hide card field id 6
  258.   end if
  259. end mouseUp
  260.  
  261.  
  262.  
  263. -- part 12 (button)
  264. -- low flags: 00
  265. -- high flags: 0002
  266. -- rect: left=7 top=308 right=336 bottom=45
  267. -- title width / last selected line: 0
  268. -- icon id / first selected line: 30557 / 30557
  269. -- text alignment: 1
  270. -- font id: 0
  271. -- text size: 12
  272. -- style flags: 0
  273. -- line height: 16
  274. -- part name: First
  275. ----- HyperTalk script -----
  276. on mouseUp
  277.   visual effect scroll right
  278.   hide card field id 4
  279.   hide card field id 5
  280.   hide card field id 6
  281.   set hilite of card button id 8 to false
  282.   set hilite of card button id 9 to false
  283.   set hilite of card button id 10 to false
  284.   push card
  285.   go to card id 9514
  286. end mouseUp
  287.  
  288.  
  289.  
  290. -- part 13 (button)
  291. -- low flags: 00
  292. -- high flags: A003
  293. -- rect: left=398 top=163 right=185 bottom=462
  294. -- title width / last selected line: 0
  295. -- icon id / first selected line: 0 / 0
  296. -- text alignment: 1
  297. -- font id: 0
  298. -- text size: 12
  299. -- style flags: 0
  300. -- line height: 16
  301. -- part name: Save As
  302. ----- HyperTalk script -----
  303. on mouseUp
  304.   set userLevel to 3
  305.   hide card field id 3
  306.   hide card field id 4
  307.   hide card field id 5
  308.   hide card field id 6
  309.   hide card field id 17
  310.   set hilite of card button id 8 to false
  311.   set hilite of card button id 9 to false
  312.   set hilite of card button id 10 to false
  313.   go to card id 7235
  314. end mouseUp
  315.  
  316.  
  317.  
  318.  
  319. -- part 14 (button)
  320. -- low flags: 00
  321. -- high flags: A003
  322. -- rect: left=112 top=289 right=311 bottom=175
  323. -- title width / last selected line: 0
  324. -- icon id / first selected line: 0 / 0
  325. -- text alignment: 1
  326. -- font id: 0
  327. -- text size: 12
  328. -- style flags: 0
  329. -- line height: 16
  330. -- part name: Execute
  331. ----- HyperTalk script -----
  332. on mouseUp
  333.   hide card field id 3
  334.   hide card field id 4
  335.   hide card field id 5
  336.   hide card field id 6
  337.   hide card field id 17
  338.   set hilite of card button id 8 to false
  339.   set hilite of card button id 9 to false
  340.   set hilite of card button id 10 to false
  341.   show card field id 18
  342. end mouseUp
  343.  
  344.  
  345.  
  346.  
  347. -- part 15 (button)
  348. -- low flags: 00
  349. -- high flags: A003
  350. -- rect: left=224 top=289 right=311 bottom=282
  351. -- title width / last selected line: 0
  352. -- icon id / first selected line: 0 / 0
  353. -- text alignment: 1
  354. -- font id: 0
  355. -- text size: 12
  356. -- style flags: 0
  357. -- line height: 16
  358. -- part name: Cancel
  359. ----- HyperTalk script -----
  360. on mouseUp
  361.   hide card field id 3
  362.   hide card field id 4
  363.   hide card field id 5
  364.   hide card field id 6
  365.   hide card field id 17
  366.   set hilite of card button id 8 to false
  367.   set hilite of card button id 9 to false
  368.   set hilite of card button id 10 to false
  369.   go to card id 20989
  370. end mouseUp
  371.  
  372.  
  373.  
  374.  
  375. -- part 16 (button)
  376. -- low flags: 00
  377. -- high flags: A003
  378. -- rect: left=341 top=290 right=310 bottom=400
  379. -- title width / last selected line: 0
  380. -- icon id / first selected line: 0 / 0
  381. -- text alignment: 1
  382. -- font id: 0
  383. -- text size: 12
  384. -- style flags: 0
  385. -- line height: 16
  386. -- part name: Batch
  387. ----- HyperTalk script -----
  388. on mouseUp
  389.   show card field id 17
  390. end mouseUp
  391.  
  392.  
  393.  
  394. -- part 17 (field)
  395. -- low flags: 81
  396. -- high flags: 2004
  397. -- rect: left=295 top=226 right=284 bottom=459
  398. -- title width / last selected line: 0
  399. -- icon id / first selected line: 0 / 0
  400. -- text alignment: 0
  401. -- font id: 3
  402. -- text size: 12
  403. -- style flags: 0
  404. -- line height: 16
  405. -- part name: 
  406. ----- HyperTalk script -----
  407. on mouseUp
  408.   hide card field id 17
  409. end mouseUp
  410. on mouseLeave
  411.   hide card field id 17
  412. end mouseLeave
  413.  
  414.  
  415. -- part 18 (field)
  416. -- low flags: 81
  417. -- high flags: 2004
  418. -- rect: left=85 top=223 right=283 bottom=271
  419. -- title width / last selected line: 0
  420. -- icon id / first selected line: 0 / 0
  421. -- text alignment: 0
  422. -- font id: 3
  423. -- text size: 12
  424. -- style flags: 0
  425. -- line height: 16
  426. -- part name: 
  427. ----- HyperTalk script -----
  428. on mouseUp
  429.   hide card field id 18
  430. end mouseUp
  431. on mouseLeave
  432.   hide card field id 18
  433. end mouseLeave
  434.  
  435.  
  436. -- part contents for card part 3
  437. ----- text -----
  438. MacMainFrame's file transfer features allow true sharing of text, document, and binary data between Macintosh users and the IBM host. To download a file simply name the file, indicate the file type, and execute.
  439.  
  440. Select one of the file types above to learn more about each type of file transfer.
  441.  
  442. -- part contents for card part 4
  443. ----- text -----
  444. Text file transfer.   MacMainFrame provides the ability to upload a Macintosh file to the IBM host in Text format.  Once uploaded, files can be manipulated by host programs.  They can also be retrieved by Macintosh and IBM PC users connected to the same host.
  445.  
  446. A Text File Filtering capability consists of Variable Tab Expansion on uploads and Special Character  Insertion on downloads.  Variable Tab Expansion allows formatting to host standards of appearance.  Special Character  Insertion allows download of IBM mainframe documents for use with Macintosh applications such as Excel.
  447.  
  448.  
  449.  
  450.  
  451.  
  452.  
  453.  
  454.  
  455. -- part contents for card part 5
  456. ----- text -----
  457. Binary file transfer.    MacMainFrame's Binary Transfer feature supports transfer of Macintosh files in a binary format to and from IBM mainframes, enhancing Macintosh-to-PC communications.  When used with IBM PC host file transfer products, such as Avatar's PA100G or IBM's PC-3270 product, MacMainFrame allows files such as Lotus 1-2-3- WKS, IBM Document Content Architecture (DCA), and Microsoft. SYLK to be shared by both IBM PC and Macintosh users.  This allows  Lotus 1-2-3 and Excel users to share files with mainframe users.
  458.  
  459.  
  460.  
  461.  
  462. -- part contents for card part 6
  463. ----- text -----
  464. Document file transfer.  With this feature, users can employ the host as a storage resource, as well as a central mailbox  to exchange information such as Excel worksheets.  It does this by not only enabling the user to store an exact representation of a Macintosh file on the host, but also by uploading a Macintosh file to the host, which can later by retrieved by another Macintosh user.
  465.  
  466. -- part contents for card part 17
  467. ----- text -----
  468. Batch files permits the loading of a numer of files in one operation.
  469.  
  470. -- part contents for card part 18
  471. ----- text -----
  472. First choose a name for the downloaded file - try the button "Save As".